/bitfont <<
    /FontType 3
    /FontMatrix [.01 0 0 -.01 0 .01]
    /FontBBox [ 0 0 50 70]
    /Encoding 128 array
    /_ (\377)
    /# (\0)
    /charprocs <<

        /.notdef { 
            # # # # #
            # # _ # #
            # # _ # #
            # _ # _ #
            # _ # _ #
            # # _ # #
            # # # # #
        }

        32 { 
            _ _ _ _ _
            _ _ _ _ _
            _ _ _ _ _
            _ _ _ _ _
            _ _ _ _ _
            _ _ _ _ _
            _ _ _ _ _
        }
        48 { 
            _ # # # _
            # _ _ _ #
            # _ _ # #
            # _ # _ #
            # # _ _ #
            _ # # # _
            _ _ _ _ _
        }
        49 { 
            _ _ # _ _
            _ # # _ _
            _ _ # _ _
            _ _ # _ _
            _ _ # _ _
            _ # # # _
            _ _ _ _ _
        }
        50 { 
            _ # # _ _
            # _ _ # _
            _ _ _ # _
            _ _ # _ _
            _ # _ _ _
            # # # # _
            _ _ _ _ _
        }
        51 { 
            _ # # _ _
            # _ _ # _
            _ _ # _ _
            _ _ _ # _
            # _ _ # _
            _ # # _ _
            _ _ _ _ _
        }
        52 { 
            _ _ # _ _
            _ # # _ _
            # _ # _ _
            # # # # _
            _ _ # _ _
            _ _ # _ _
            _ _ _ _ _
        }
        53 { 
            # # # # _
            # _ _ _ _
            # # # _ _
            _ _ _ # _
            # _ _ # _
            _ # # _ _
            _ _ _ _ _
        }
        54 { 
            _ # # _ _
            # _ _ _ _
            # # # _ _
            # _ _ # _
            # _ _ # _
            _ # # _ _
            _ _ _ _ _
        }
        55 { 
            # # # # _
            _ _ _ # _
            _ _ _ # _
            _ _ # _ _
            _ # _ _ _
            _ # _ _ _
            _ _ _ _ _
        }
        56 { 
            _ # # _ _
            # _ _ # _
            _ # # _ _
            # _ _ # _
            # _ _ # _
            _ # # _ _
            _ _ _ _ _
        }
        57 { 
            _ # # _ _
            # _ _ # _
            # _ _ # _
            _ # # # _
            _ _ _ # _
            _ # # _ _
            _ _ _ _ _
        }

    >>
    /BuildChar {
        %100 0 0 0 50 70 setcachedevice
        80 0 setcharwidth
        %-1 1 scale
        %10 10 scale
        exch begin
            charprocs exch
            2 copy known not{pop/.notdef}if
            get exec
            5 7 8 [-.1 0 0 -.1 .1 .1] {} image
        end
    }
>> definefont
pop

100 100 moveto
/bitfont 40 selectfont
pstack()=
%break
(0123456789?)
show

showpage
